perm filename IX[SAM,LCS] blob
sn#437770 filedate 1979-05-01 generic text, type T, neo UTF8
INS 2; < INSTRUMENT 2
TOOT
CLAR
BRIT
BUZZ
;
OSC P4 P2 B2 P5;OSC B2 P3 B2 P6;OUT B2 B1;END;
SIN 1 1; <SINE WAVE F1
SEG 2 0 1 .9 6 1 11 .9 82 .7 90 0 100; < MEZZO LEGATO F2
SEG 3 0 1 1 3 1 10 .4 23 .15 40 0 100; < STACCATO F3
SIN 4 .5 0 .3 0 .2 0 .1; < CLAR F4
SIN 5 .3 .4 .2 0 0 0 0 .2 0 0 0 0 .1; < BRIT F5 (TO 12TH HARM.)
SEG 6, -1 1 1,7, -1,14, -1,100; < BUZZ PULSE F6
< IS .SCR -- RANDOM NUMBER= 1
PLAY;
TOOT 0.000 0.630 D*4 0.488 F3 F1
;PRINT P1;< TOOT 1
TOOT 0.630 0.634 GS*4 0.835 F3
;PRINT P1;< TOOT 2
TOOT 1.264 0.061 FS*2 0.616 F2
;PRINT P1;< TOOT 3
TOOT 1.325 0.203 CS*2 0.900 F2
;PRINT P1;< TOOT 4
TOOT 1.528 0.391 AS 0.503 F2
;PRINT P1;< TOOT 5
TOOT 1.919 0.631 D*2 0.485 F2
;PRINT P1;< TOOT 6
TOOT 2.550 0.395 FS*2 0.956 F2
;PRINT P1;< TOOT 7
TOOT 2.945 0.496 D*4 0.598 F2
;PRINT P1;< TOOT 8
TOOT 3.441 0.509 C*8 0.495 F3
;PRINT P1;< TOOT 9
TOOT 3.950 0.298 B*2 0.663 F2
;PRINT P1;< TOOT 10
TOOT 4.248 0.239 GS*2 0.517 F2
;PRINT P1;< TOOT 11
TOOT 4.487 0.343 B 0.647 F3
;PRINT P1;< TOOT 12
TOOT 4.830 0.591 G*4 0.781 F3
;PRINT P1;< TOOT 13
TOOT 5.421 0.536 DS*4 0.605 F2
;PRINT P1;< TOOT 14
TOOT 5.957 0.512 C 0.532 F3
;PRINT P1;< TOOT 15
TOOT 6.469 0.449 GS 0.341 F3
;PRINT P1;< TOOT 16
TOOT 6.918 0.592 B*2 0.331 F2
;PRINT P1;< TOOT 17
TOOT 7.510 0.677 E*2 0.543 F2
;PRINT P1;< TOOT 18
TOOT 8.187 0.605 B 0.366 F3
;PRINT P1;< TOOT 19
TOOT 8.792 0.589 B*2 0.345 F2
;PRINT P1;< TOOT 20
TOOT 9.381 0.066 C*4 0.963 F2
;PRINT P1;< TOOT 21
TOOT 9.447 0.299 C*8 0.671 F2
;PRINT P1;< TOOT 22
TOOT 9.746 0.497 C 0.526 F3
;PRINT P1;< TOOT 23
FINISH; < IS .SCR